home *** CD-ROM | disk | FTP | other *** search
/ Micromanía 93 / CDMM_93_2.ISO / Project Nomads / nomads_demo_eng.exe / SILO.TCL < prev    next >
Encoding:
Text File  |  2002-04-19  |  3.4 KB  |  136 lines
  1. #
  2. #   Zustands-▄berwachungs-Script
  3. #   State Watch Script
  4. #
  5. #   Silo
  6. #
  7. #   created:    15-Jun-2000 Bernd
  8. #   
  9. #   (C) COPYRIGHT 2000 RADONLABS GMBH
  10. #
  11. # --------------------------------------------------------
  12. #                     S I L O
  13. # --------------------------------------------------------
  14. proc silowatch_normal {} {
  15.  
  16.     # vorerst hier unzerstoerbar. Bleibt so, bis es aufgesammelt
  17.     # (in BackPack) oder gebaut (kein Artefakt mehr) wird 
  18.     if {[.getartefactmode] == "false"} {
  19.         .announcestate house
  20.     } elseif {[.iscollected] == "true"} {
  21.         .announcestate backpack
  22.     } elseif {[.getcharges] <= 0} {
  23.         .setremoveable true
  24.     } elseif {[.getcreator] != "null"} {
  25.         .announcestate infactoryslot
  26.     }
  27. }
  28.  
  29. proc silowatch_infactoryslot {} {
  30.  
  31.     # vorerst hier unzerstoerbar. Bleibt so, bis es aufgesammelt
  32.     # (in BackPack) oder gebaut (kein Artefakt mehr) wird 
  33.     if {[.getartefactmode] == "false"} {
  34.         .announcestate house
  35.     } elseif {[.iscollected] == "true"} {
  36.         .announcestate backpack
  37.     } elseif {[.getcharges] <= 0} {
  38.         .setremoveable true
  39.     } elseif {[.getcreator] == "null"} {
  40.         .announcestate normal
  41.     }
  42. }
  43.  
  44. proc silowatch_bauphase {} {
  45.  
  46.     # kann zerstoert oder wieder zusammengeklappt werden
  47.     if {[.iskilled] == "true"} {
  48.         .announcestate explode
  49.     } elseif {[.getartefactmode] == "true"} {
  50.         .announcestate normal
  51.     } elseif {[.isstatetimeover] == "true"} {
  52.         .announcestate house
  53.     }
  54. }
  55.  
  56. proc silowatch_house {} {
  57.  
  58.     # kann zerstoert oder wieder zusammengeklappt werden
  59.     if {[.iskilled] == "true"} {
  60.         .announcestate explode
  61.     } elseif {[.getartefactmode] == "true"} {
  62.         .announcestate normal
  63.     } elseif {[.isdooropen] == "true"} {
  64.         .announcestate open
  65.     } elseif {[.removebuilding] == "true"} {
  66.         .announcestate remove
  67.     }
  68. }
  69.  
  70. proc silowatch_explode {} {
  71.  
  72.     # Uebergang zum Artefakt oder Wegnehmen, wenn die Charges 
  73.     # aufgebraucht sind
  74.     if {[.isanimfinished] == "true"} {
  75.         if {[.getcharges] <= 0} {
  76.             .setremoveable true
  77.         } else {
  78.             .announcestate normal
  79.         .removefromisland
  80.         }
  81.     }
  82. }
  83.  
  84. proc silowatch_remove {} {
  85.  
  86.     # Uebergang zum Artefakt oder Wegnehmen, wenn die Charges 
  87.     # aufgebraucht sind
  88.     if {[.isanimfinished] == "true"} {
  89.         if {[.getcharges] <= 0} {
  90.             .setremoveable true
  91.         } else {
  92.             .announcestate normal
  93.         .removefromisland
  94.         }
  95.     }
  96. }
  97.  
  98. proc silowatch_backpack {} {
  99.  
  100.     # Moeglich: usgeworfen (Nicht mehr "gesammelt") oder im
  101.     # Menue gezeigt (sichtbar)
  102.     if {[.iscollected] == "false"} {
  103.         .announcestate normal
  104.     } elseif {[.isvisible] == "true"} {
  105.         .announcestate menue
  106.     }
  107. }
  108.  
  109. proc silowatch_menu {} {
  110.  
  111.     if {[.isvisible] == "false"} {
  112.         .announcestate backpack
  113.     } elseif {[.getartefactuse] == "true"} {
  114.         .announcestate build
  115.     } elseif {[.iscollected] == "false"} {
  116.         .announcestate normal
  117.     }
  118. }
  119.  
  120. proc silowatch_build {} {
  121.  
  122.     if {[.iskilled] == "true"} {
  123.         .announcestate explode
  124.     } elseif {[.getartefactmode] == "false"} {
  125.         .announcestate bauphase
  126.     } elseif {[.getartefactuse] == "false"} {
  127.         .announcestate backpack
  128.     }
  129. }
  130.  
  131. proc silowatch_cinematic {} {
  132.  
  133.     # empty
  134. }    
  135.  
  136.